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1.0 ABSTRACT 


THE RPLIC Fpeme TEE CONSISTS OF THREE PARTS. PART | 
FORMATS AN RPO3S DISK , ot NORMAL MANNER AND CHECKS 


‘ ALL ADDRESSES FOR VALIDITY. PART 2 ALLOWS THE 
a OPERATOR 10 pe THE etre e ANY DES i 
SECTOR. PART 3 FORMATS AND 


CTO VERIFIES THE OISK WIT 
OER mn OF SECTOR ADDRESSES SPECIFIED BY THE 


2.0 REQUIREMENTS 


2.1 EQUIPMENT 
POP-11 CONFIGURATION 


STANDARD 
RP1iC DISK CONTROLLER 
. ONE OR MORE RPO3 DISK DRIVES 


2.2 STORAGE : 
PROGRAM REQUIRES 4K OF STORAGE 


2.3 PRELIMINARY PROGRAMS 


DZRPA DISKLESS DIAGNOSTIC 
DZRPB RP1LC RELIABILITY DIAG gnostic 


3.0 LOADING PROCEDURE 
USE STANDARD PROCEDURE FOR ABS TYPES. 


4.0 STARTING PROCEDURE 


4.1 CONTROL SWITCH SETTING 
SEE SECTION 5.1.1 
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THE PROGRAM MAY BE STARTED AT ONE OF FOUR LOCATIONS 


1. 


TARTING ADDRESS 200 WILL FORMAT THE ENTIRE 
ACK AND THEN VERIFY THAT THE HEADERS HAVE 
BEEN WRITTEN CORRECTLY. 


STARTING ADDRESS 250 “WILL ‘ALLOW THE 
OPERATOR TO SPECIFY A PARTICULAR HEADER TO 
BE REWRITTEN AND VERIFIED 


STARTING mon 300 WILL FORMAT THE ENTIRE 
PACK USING THE SECTOR ADDRESS SEQUENCE 
PROVIDED BY THE OPERATOR. AFTER FORMATTING 
THE PACK IS VERIFIED. 


STARTING ADDRESS 350 ALLOWS THE OPERATOR TO 
VERIFY ALL THE HEADERS ON THE PACK. 


4.3 PROGRAM AND/OR OPERATOR ACTION 


1. 


wf WwW fy 
a Shee mee 


\ 


LOAD _THE PROGRAM INTO MEMORY USING THE ABS 
LOADER. 


LOAD DESIRED STARTING ADDRESS 
SET SWITCHES (SEE SEC 5.1.1) 
PRESS START 


WHEN THE PROGRAM IS comcre, IT TYPES OUT 
“TEST COMPLETE” AND HALTS. 


5.0 OPERATING PROCEDURE 


“5.1 OPERATIONAL SWITCH SETTINGS 


AFTER LOADING STARTING ADDRESS SELECT THE DESIRED 


SWITCHES 
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SWITCH SETTINGS ARE: 


ine seve HALT ON ERROR 
eevee NOT USED 
hh coves eee PRINTOUT 


TU 
SWi10>=1..... BELL ON ERROR 
SUBROUTINE ABSTRACTS 


TRAPCATCHER 


* 42" = “HALT” SEQUENCE IS REPEATED FROM 0-776 TO 
faTén’ ANY “UNEXPEETES TRAPS THES ANY UNEXPECTED 
FRAPS OR INTERRUPTS ILL HALT AT THE VECTOR se, 


ERROR HANDLER 


THIS ROUT INE IS ENTERED UPON DETECTION OF AN ERRO 

THE ERR OR ADDRE Seb PDP- P41 ST STATUS, fie RELEVENT ERROR 
INFORMATION IS INHIBIT 
TYPEOUTS, AND wan’ ON ObRROR® arcu ARE “Ftste TED. 


ERRORS 


ERROR PRINTOUTS 
#1 ERROR MESSAGE FORMAT: 


ERROR AT ADDRESS XXXX 4 yEROCESSOR STATUS 
CALLED FROM SUBROUTINE @ 

RPCS = CONTENTS OF Recs \ 

RPCS = CONT: 


ENTS OF RPCS 
RPER = CONTENTS OF RPER 
RPDS = CONTENTS OF RPDS 


THE ADDRESS WHERE THE ERROR WAS 
ENCOUNTERED. 

YYY = IF THE ERROR WAS ENCOUNTERED IN A 

SUBROUTINE, THIS ADDRESS REFERS BACK TO THE 

MAINLINE CODE WHICH CALLED THE SUBROUTINE. 
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OZRPD.P11 
em #2 ERROR AT ADDRESS Xxxx PS= PROCESSOR STATUS 
231 CALLED FROM SUBROUTINE AT YYY 


—_— 2 


— ee ee ee 












PACK FORMATTER 






















MACY11 27(732) 16-SEP-7$ 14:44 PAGE 8 


: gogo _ CYLINDER TRACK SECTOR 


THIS «ae TS GIVEN IF AN ERROR OCCURS WHILE 


si CONTENTS oF ve" HenoeR BG BRO EGuALS” WHat URS 
os ACTUALLY FOUND IN THE HEAD 


7.0 RESTRICTIONS 
249 NONE 





8.0 MISCELLANEOUS 


* 6.1 EXECUTION TIME 





2s8 AFTER PERFORMING THE SELECTED TASK, THE PROGRAM WILL 
3 TYPE TEST COMPLETE AND HALT. 
ebe 
63 8.2 STACK POINTER 
264 





ess THE STACK IS INITIALLY. SET TO 600. 


es? 

268 ." 

263 3.0 PROGRAM DISCRIPTION 

e70 

e7) - 

e7e 

273 3.1 STANDARD FORMATTER 

ere ONCE STARTED THE PROGRAM TYPES: 

re UNIT ; 

273 an jar FOR INP RESPOND WITH THE RELEVENT 
sey SE TURN NUMBER (0-7) AND TERMINATE WITH A CARRIAGE 


e83 THE TTY THEN PRINTS: 


ees © SET ne ey wee SWITC 
e86 SET RP11C WRITE ENABLE SUITCH, 
SET : SELECTED UNIT WRITE ENABLE SWITCH. 





roror 
Pow 
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288 STRIKE ANY TELETYPE KEY WHEN READY. 





sessing tiieaagsitarretetaaesnieiniinainesehsieiier aiiniantitatea di ammmiminnmneNdni nen nnaiaaite 
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8g - PAGE 7 
30 


e 

STRIKING ANY KEY CAUSES THE FORMATTING OPERATION 10 
233 EGIN. WHEN THE DISK HAS BEEN FORMATTED, THE TTY 
cae PRINTS 
236 RESET THE FORMAT ENABLE SWITCH TO NORMAL. 
314 STRIKE ANY TELETYPE KEY WHEN READY. 
e399 STRIKING ANY KEY CAUSE THE PROGRAM TO ENTER @A 
300 READ/COMPARE HEADER SEQUENCE. WHEN COMPLETE THE 
301 PROGRAM TYPES TEST COMPLETE. 


305 , 9.2 SINGLE HEADER FORMATTER 


306 : 

307 ONCE STARTED, THE PROGRAM QUERIES FOR. THE UNIT 
368 NUMBER AS IN’9.1. THE PROGRAM THEN PRINTS: 

310 CYLINDER TRACK SECTOR 

gi OLD: 

313 AND WAITS FOR INPUT. 

314 TYPE THE PHYSICAL CYLINOER TRACK, AND SECTOR OF THE 
315 DESIRED ADDRESS INATE THE FIRST TWO WITH A 
316 SPACE AND THE car Mite A CARRIAGE RETURN. 

317 THE PROGRAM THEN TYPES: 

321 AND WAITS FOR INPUT. THE THE DESIRED ADDRESS IN THE 
322 So TUNE ee ABOVE. THE PROGRAM WILL FIRST 
354 RETERMENE VALIDITY. HEN re DESIRED PROGR TYPES 
325 at HIME VALIOUT AND HALTS. 

326 

327 

328 


= 3.3 SPECIAL FORMATTER 

331 ONCE STARTED, THE PROGRAM GUERIES FOR THE UNIT 
s36 NUMBER AS IN’S.1. THE PROGRAM THEN PRINTS: 

oa INPUT THE SECTOR NUMBERS (0-9) IN THE DESIRED CRDER. 
336 OQ: 

337 


33 SFaER cine” NORBERS” ARE HE GLESTED. mo Meee TEED 
| #3 DIKE MANNER. ONEE A. SECTOR NUNBER HAS es ised {7 
> 341 CANNOT BE SPECIFIED AGAIN. 


343 AFTER THE LAST PARAMETER HAS BEEN PROCESSED, THE 
344 PROGRAM WRITE THE PACK TO THE DESIRED FORMAT AND 





cee 
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He ; THE" SALIBETY OF ALL ADDRESSES. WREN THE PROGRAR f 





—_ a ee ee eee | 
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347 PAGE 8 





349 

350 FINISHED IT TYPES TEST-COMPLETE AND HOLTS. % 
352 ;RP11 DISK FORMATTER 

353 ROBERT J. COLLINS 

358 : JANUARY 29, 1971 

356 17757 SR=177570 SWITCH REGISTER 

357 - 177776 CC=177776 :CONDITION CODES 


366 
#4 000006 SP=%6 ;STACK POINTER 


0000 
402 040000 814=40000 


ene ee 
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DZRPD. 

403 190000 815=10000U 

404 10400 ERR=EMT 

40S 10440 ERM=TRAP 

408 oco001 GB=80 

48% aa pe=B4 

409 000010 ER=B3 

410 ooco20 CS=B4 

4il 000040 DA=BS 

412 990100 = 

413 005726 POP=5726 

a8 322626 POPPOP=22626 

416 . .MACR ANDI A,B 

41? BIC #-A-1,8 ;MASK A APPLIED TO B 

418  ENDM 

419 

420 

421 .MACR PNTM A 

yoo MOV #A, RC sPRINT MESSAGE 

4o3 ISR PC; TYPOUT *POINTED TO BY A 

44 .ENDM 

425 

4>5 .MACR PNTOL A 

4o?7 MOV A.RO ;PRINT 6 OCTAL 

42g ISR Pt, PNTOCT :NUMBERS IN A 

$29 .ENDM 

430 

431 

432 

433 

434 oooooo = 
“REPT 140 
fey ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
.ENDR 
ees ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
ste, ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
ites ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
fe, ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
tes ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
tes ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
ates ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
witty ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
tt, ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
+2 - TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
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OrReE. BT) Zz, 
veg 900050 sponse 92 “TRAPPED OR INTERRUPTED TO PREVIOUS ACORE 
wed 500052 00550 HALT 
481 550054 900055 ee STRAPPED OR INTERRUPTED TO PREVIOUS ADDSE 
oe Shots el HALT 
463 55556 48 :TRAPPED OR INTERRUPTED TO PREVIOUS ADORE 
wes SSSSES BoOoEE Ha TRAPPED OR INTERRUPTED TO PREVIOUS ADDRE 
he: a U wi TO . V4 uJ = 
32 Bbo5ee Sooose 
i 
| 
| 
! 


wewsw oof 


> ws «we «ft an 


& 
o 


ore se, : TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
eal .+ ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
a hs ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
] 


HEE 


NIP EVOT LOG FVOR LOC E Oe £uOe Lue Lc 
: 
a 


; ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
12 98. ;TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
000116 $2, ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
lz ne, ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 

; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 

;TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 


ees 


: 
i: 
sb 


AoNsor HALT 
487 p00142 +e : TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
4 at's oe TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
456 p09000 HALT i 

131 worise we, TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
495 occ +3 STRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
494 HALT : 


PR 
BBSHESHBSHEBEBRHBSHEBRBEARBURE 





485 009162 +2 TRAPPED OR INTERRUPTED TC PREVIOUS ADDRESS 
39 900000 HALT 
467 00166 +2 ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
498 990009 HALT 

433 9091 wey ;TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
501 74 690176 42 TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
206 haeeae ws TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
504 od00ece 555808 HALT ey z 
505 900204 00206 fee TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
£5 raat peers -* TRAPPED OR INTERRUPTED TO PRE\.OUS ADDRESS 
55e lz 00000 HALT 
E09 600214 OOoci6 i ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
E10 O00216 oc0000 HALT 
ae sete 2 009222 $2 TRAPPED CR INTERRUPTED TO PREVIOUS ADDRESS 
26 000224 002 | + TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
534 00226 00000 HALT 


SE Se we indpiiacinianiiiineaenaimpiiaansiasies 





3 

a 

Ss ~u) 
ate 
reese 


on 





uiomnutt 4 
Be 


~+~e—-6—- 6-5 


fuiururgec en iow 





rorure 





tit 
Hoe 


i 


se 


Seeteie 


: 000390 
S36 00030c 
000304 

090306 
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; TRAPPED OR 
; TRAPPED OR 
; TRAPPED OR 
; TRAPPED OR 
; TRAPPED OR 
: TRAPPED OR 
; TRAPPED OR 
; TRAPPED OR 
; TRAPPED OR 
; TRAPPED OR 
; TRAPPED. OR 


~ TRAPPED OR 


; TRAPPED OR 
; TRAPPED OR 
; TRAPPED OR 
; TRAPPED OR 
; TRAPPED OR 
; TRAPPED OR 
; TRAPPED OR 
; TRAPPED OR 
; TRAPPED OR 
; TRAPPED OR 
; TRAPPED OR 
; TRAPPED OR 
; TRAPPED OR 


_ TRAPPED OR 


; TRAPPED OR 
; TRAPPED OR 








INTERRUPTED TO PREVIOUS ADDRESS 
INTERRUPTED TO PREVIOUS ADDRESS 
INTERRUPTED TO PREVIOUS ADDRESS 
INTERRUPTED TO PREVIOUS ADDRESS 
INTERRUPTED TO PREVIOUS ADDRESS 
INTERRUPTED TO PREVIOUS ADDRESS 
INTERRUPTED TO PREVIOUS ADDRESS 
INTERRUPTED TO PREVIOUS ADDRESS 
INTERRUPTED TO PREVIOUS ADDRESS 
INTERRUPTED TO PREVIOUS ADDRESS 
INTERRUPTED TO PREVIOUS ADDRESS 
INTERRUPTED TO PREVIOUS ADDRESS 


INTERRUPTED TO PREVIOUS ADDRESS 


INTERRUPTED TO PREVIOUS ADDRESS 


INTERRUPTED TO PREVIOUS ADDRESS 


INTERRUPTED TO PREVIOUS ADDRESS 
INTERRUPTED TO PREVIOUS ADDRESS 
INTERRUPTED TO PREVIOUS ADDRESS 
INTERRUPTED TO PREVIOUS ADDRESS 
INTERRUPTED TO PREVIOUS ADDRESS 
INTERRUPTED TO PREVIOUS ADDRESS 
INTERRUPTED TO PREVIOUS ADDRESS 
INTERRUPTED ‘tv PREVIOUS ADDRESS 
INTERRUPTED TO PREVIOUS ADDRESS 
INTERRUPTED TO PREVIOUS ADDRESS 
INTERRUPTED TO PREVIOUS ADDRESS 
INTERRUPTED TO PREVIOUS ADDRESS 
INTERRUPTED TO PREVIOUS ADDRESS 





~-- 
o- 
o 

e- oo 
a he | 
~~ 


S77 000424 


gn 


am 


SERRE 
sue 


SReRRaEREE 
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TOMO rrr@or 
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e ; TRAPPED OR INTERRUPTED TO PREVIOUS ADORESS 












*, 
ae ;TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
"48 ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
id ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
ae ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
ster ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
net ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
fer ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
fet ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
ner ;TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
ser ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
ee 7 ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
fer ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
fer ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
et ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
si, : TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
et ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
x Wee ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
"42 TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
ae : >. TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
ee : ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
wet ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
net ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
wer ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
"48 ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
ae ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
er ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
+2 ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
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; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 


at 
ERROR 
340 





aSTART1 PC 
eSTART2 , PC 
#START3, Pc 
#STARTY, PC 
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BES SRRESRES 
Sans 


emus 


bee 


OONKTOMrMmm@ 
BBVRA LOG 
Tu 


88888888 8888 





177164 


006004 


176750 


176734 
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¢ DISK PACK poe ren 
te iy ANDARD FORMATTER 


WILL FORMAT hs 


ITHIN EACH SEC 


aSTART1,SP 
#P7,CC 


PC, UNIO 
SWMES 


#SWMES. RO 
PC, TYPOUT 
PC’RIN - 


Prete SIV 
ar? aRPSV 


saio3, SRPCS 
#P4.P 


BNE 
ERR+DS+CS+ER+DA 
JMP NSe 


RS, SAVOS 
#815 aRPCS 


RS,RESTOS 
#NSe, -(SP) 
#87, JRPCS 


+6 
ERR+CS+ER+CS 
BR RPIX 


RS,RESTOS 
aSTRY,-(SP) 


sSTART1,SP 
#P7,CC 


SNSWMES 
Pe TYeCUT. 


ENTIRE PACK AND THEN VERIFY 
R. STARTING ADDRESS IS 200. 


; INITIALIZE STACK POINTER 


EAR ho aa BP 


POINTED’ 10 0 BY SWMES 
WAIT FOR KEYBOARD RESPONSE 


e@eeeeese ee eeese 
| on 


“ 
a 


age 


eee 


BICZZ 5 


EP 
ADDRESS NOT CHANGING IN TIME 
PI HANDLER - SAVE RO-5 


——< 


Siaos 


TORE RO-S 
OLD PC 


sy NEW PC 
SEXIT TO PASS 2 


;LOCKOUT PI'S 


;PRINT 
POINTED TO BY NSWMES 














MESSAGE 















“10 MSEC. TIMED OUT? 
CHECKING 





DURING FORMAT GENERATION 










MESSAGE 
















SNININI III 
02 b=2 b~0 b2 92 b= fo Pa pe bo 
00 NIMUILC ITH OE 





Tes 





aaa $ 
8888 


> + - b- © + > 6 op 


RSS TRA LSA ASIAN E NERO NO 


8 
ai 


ie) 
‘EORone 


SR OMSESKER oR 


raroneey 
~ 
m™ 


S88888888888SS8s8sss 
wr 


+ +0 +6 +00 +b 0+ 0 9 = 9-3 + 


GEREN 


PIR Res tl 


Wa) 
£o 


Slelatetat=tatalatelstalatelststatatetetst=st=) 


O— 0+ b+ 0+ & 2 & + OO b+ = 0 0 2 he 


FSS3RR8 
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#% STANDARD FORMATTER ## 


177546 


006411 
005270 


00S712 Peli: 
005706 


005676 


-O0SES4 


005636 


000911 


Pele: 


PEN]: 


PeL3: 


poo0e3 


000625 


1$: 
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JSR FC, RIN 
MOVE itt rages 
Tee” BRO 
I AE gree 
CLR ar 
MOVB #11. aRPCS 
I ATNB, JRPDS 
MOVE 4377, RPDS 
BIT #811; JRPDS 
SEQ a 
ERRtER+C5+05+0A 
MOV 8-600., 
MOV #INBUF. IRPSA 
BIS #14000, JRPCS 
MOVE 5, aRPCS 
BIT 05) 5087, aRPCS 
BEQ 
ERR VERODSHC SOR 
aR eL2 
CLR D 
CLR ¢ 
MOV #INBUF RY 
JSR PC, CHKAD 
NOP - 
INC SEC 
- CMP SEC, #9 
BHI “+6 
IMP P2L3 
CLR SEC 
INC HED 
CMP HED, #19 
BHI . +6 
IMP P2L3 
CLR HED 
INC CYL 
CMP CYL, 8405. 
BHI 1 
IMP P2L2 
PNTM END 
HEN RO 


PC, TYPOUT 


OVE 
YES 

:NO- CHECK NEXT ADDRESS 
;ADVANCE CYL# 

sDONE ALL? 





;WAIT FOR OPERATOR 
'RESET RPLI 


SCLEGR ATTN 
:NO= SEEK INCOMPLETE ON PASS2 SEEK 
READ ONE CYLINDER OF HEADERS INTO 


10/15 HEADER MODE 
;READ HEADERS 

5 ERROR OR DONE 
NOT YET 


: DONE 
‘ERROR ON READ HEADER OP. 
sRECYCLE 


;START ADORESS pears 


“ZINITIALIZE GOOD DAT 


;POINTER : DATA READ 

CHECK DATA 

NO LOOPING 
VANCE SEC 

sOVELO? 

;NO- CHECK NEXT ADDRESS 

iOveLO? HERD 


w 


3v ; 
;NO- READ ANOTHER BLOCK 


T MESSAGE 
SPOINTED® "0 Wy ENOM1 






PACK FORMATTER 
#% SINGLE HEADER FORMATTER #* 


s} 
35 


3 


oKee 


¢ 


0-2 — 2h © 


FERELFSRRMT RN ee ROOE 


Rata 


BIRR CAU SSIS Baa ol sae cae 


SS8RSeR Sess sRssRse Ese RsRRsREsREReERES 


sy 
‘6 


GEtaReGReS 
Brodke Referees 


Mmowoo«m 
ae sy ara 
S8888888 
= 
oo 

<—s 

or 





MACY11 


176416 


005320 


005214 


005176 


00S466 
005456 


ALI: 
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16-SEP-76 14:44 PAGE 20 


-SBTTL ## SINGLE HEADER FORMATTER *# 


; THIS ROUTI 


START2: MOV 
MOV 





ALLOW 


: R TO BE FORMATTED AND THEN VERI 
HTS 280. 


aS PATI, SP 
#P7,CC 


PC, UNIQ 
HOMS 


THE QBERATOR To SPESTFY 8 DORIC AE og 


THE STAR 


ser STACK POINTER 
;LOCKOUT PI 

i CLEAR THE WORLD 
;GET UNIT 


;PRINT MES 
;POINTED TO BY NORE 


sPRINT MESSAGE 
sPOINTED’TO BY OLDMS 


i HURDS=SECTOR 








= 
Oo 


@Mwnmm@m 
0 op 
wooOo~iouw + 


888888 


~~ >= 0 > 9 » <p + bo 0 


SSE REN ER 


ets} 


ormd 
We 


=} 


SERRE 


3 


a 


SSBSSRRsResResRs 
a ld? 

3 

a3 


ULL ee ee aa ee eae ae SNS a 


ee 





00S4 
0051 
00S 


eet 


006411 
0045 
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TTER 
## SINGLE HEADER FORMATTER ## 


ny INBUF +2 
HOME 


cogNERggeneSEESA? 
é. 
3 
3 


eee 


Se 
e- 


| un 








He ADDRESS 
10/15 MODE HEADER OP 
i108 CYLINDER 


eats TO BE CHANGED 


fey Y AGAIN 
ROY 


FOUND 
310/15 MODE HEADER OP 


ERROR OR DONE? 
;NOT YET 


POINT 
REWRITTEN HEADER 
TERROR - TRY AGAIN 


;PRINT MESSAGE 
;POINTED TO BY ENOM 





: ERROR ON ERIN NEW HEADER 
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ll #% SPECIAL FORMATTER ## 


-SBTTL ## SPECIAL FORMATTER ## 


;THIS ROUTINE WILL FORMAT THE ENTIRE PACK USI 
‘ ADGRESS SE QUE F SPECIFIED BY THE OPERATOR. T 
;ADDRESS IS 300. 


TART3: MOV START, 
STARTS: (OY SSTARTL,SP 


SFSLI: 

sPRINT MESSAGE 
;POINTED 10 BY SECMES 
sCLEAR FLAG STRING . 
300 BELOW 10 TIMES © 
;POINTER TO MESSAGE POINTERS 
;FETCH POINTER 


3F SSAGE 
;GET PARAMETER 
sERROR 

:NOT YET 
s erere A TABLE OF ADDRESSES 


;SELECTED UNIT 
sSTART AT CYL=0 
sLOAD 

;DISK ADDRESS 

; SEEK 

sERROR RETURN 
;GO00D RETURN 


;WC&CA 
310715 HEADER MODE 


#3 Ss : 

#815+87, JRPCS s ERROR OR DONE 
BPL SFSN1 : DONE 
ERR+ER+D5+CS+DA ;ERROR_ON WRITE HEADER OP 
8R SFSL4Y : REPEAT 


SOROS RUN se 


Re fii eeemeeumeuuenn ts 
BRB 


;ADVANCE CYLINDER ADDRESS 
; INDEX 

;NO 

:ADVANCE CYLINDER 
;DONE? 

s YES 

sNO 

#P7. PS “LOCKOUT PI 

UNIT, JRPCS1 SET UNIT 

PC, HOME : 


c 
CYL, IRPCA 
JRPDA 


879 
88s 
881 
882 
883 
884 
88S 
886 
887 
888 
889 
890 
891 
892 012777 
893 012777 
894 052777 
895 
896 
897 
898 
839 
900 
901 
902 
$03 
904 
30S 
906 
407 
908 


OwowonNwoOwWwo 
0 0 0 (0 
OWcwM-Ow 








~ ihe 
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DZRPO.P11 #% SPECIAL FORMATTER ** 
17 1 7 000360 ; PC, SEKE ; SEEK 
ate ppedte ne oe ce ape i PEESR RETURN 
919 O02420 O1 176650 004354 MOV #-500.,dRPWC WC 
320 002426 012777 O07252 004350 MOV #INBUF,JRPBA =; CA 
22 34 058777 n14o00 6904334 BIS #14000 DRPCS =; 10/15 HEADER OP 
2 110777 000005 O04326 MOVE aRPeS READ 
924 O024S0 032777 100200 094320 IT #815+87,aRPCS  ;ERROR OF DONE? 
925 0020456 001774 Q .-6 NOT YE 
926 o020460 100002 BPL SFCNL : JUMP IF DONE 
$27 O02e462 104074 ERR+ER+D5+CS+DA “READ HEADER ERROR 
S28 002454 500745 R oF +L 
929 O02466 O01 003076 SFCN1: MOV #SCSLT,RS *SETUP SECTOR LIST AND 
$30 002472 012767 177766 oo4206 MOV #-10. , toG1 : COUNTER 
931 G02500 605067 004230 CLR -SETUP GOOD DATA 
932 012704 Oo MOV sINBUF RY :SETUP BUFFER POINTER 
$33 002510 012567 O04222 SFCL2: MOV (RS)+, SEC *FETCH A SECTOR 
834 002514 604767 009744 ISR PC, CHKAD _ $CHECK ADDRESS 
935 002520 o00240 NOP *NO LOOPING 
$36 002522 005267 OO4I1E0 INC TOG1 | *DONE ONE SURFACE? 
$37 002526 001370 BNE SFCL2 _ NO 
938 00253G 012705 003076 MOV #SCSLT,RS *YES - RESET 
939 002534 012767 177766 OO4144 MOV #-10. , TOG1 :SECTOR PARAMETERS 
840 O02542 O0S267 OO41E6 INC HED :ADVANCE TRACK 
941 002546 026727 OO4l62 000023 CMP HED, #19. : DONE? 
942 002554 101755 BLOS sFct2 : 
943 002556 7 904152 CLR HED *YES - RESET HEAD 
944 002562 7 904144 INC CYL :ADVANCE CYLINDER 
945 002566 026727 OO4140 oOdbes CMP CYL, #405. > DONE? 
946 002574 101701 BLOS  SFCL1 NOT YET 
947 002576 PNTM = ENDM1 
948 002576 012700 o06411 MOV #ENDM1. RO ;PRINT MESSAGE 
949 O02602 004767 O04026 JSR PC, TYPOUT ;POINTED’TO BY ENDMI 
950 oo0000 > HALT 
951 002610 012705 177742 CLRS: MOV #-30. RS CLEAR 
952 002614 012704 003076 MOV #SCSLT,R4 >THE SECTOR 
953 O0c620 105024 CLRSI: CLRE. (R4)+ :SLOTS AND 
954 O02622 O0520s INC: RS *FLAG POINTERS 
955 02624 001375 BNE CLRS1 tEXIT 
956 002626 000207 RTS PC “WHEN DONE 
957 002630 004767 001140 SIN: JSR PC, RIN. : 
958 002634 004767 003662 JSR PC’ TTO : 
959 CO2640 162700 000260 SUB #260,RO - -:A LIST OF 
960 44 020027 O00011 CMP. RO, #9. sLOGICAL SECTOR 
361 101012, BHI SIN NUMBERS 
a62 O0eb5e 005700 TST RO : Tog L? 
a3 ppseee 1Be7eg 003122 ae aAN cro) *HAS THIS AGMBER BEEN USED? 
965 O02662 001005 -ERROR - THIS NUMBER ALREADY USED 
966 002664 105160 oo3122 SCFLG(RO) SET FLAG 
967 002670 610024 MOV RO, (R4)+ -STORE SEC® 
cog ooeb7e 062716 oo0002 #2; (SP) “ADVANCE RETURN 
969 676 000207 SIN1: RTS C :AND EXIT 
970 002700 012767 177754 OO4O00 MKBUF: MOV #-20. , T0G1 ‘ TOGI=COUNTER 
§71 002706 012705 011552 MOV sOUTBUF RS :RS=POINTER TO BUFFER 
972 002712 012704 003076 MOV #SCSLT, RY :R4=POINTER TO SECTOR LIST 








RP11C DISK PACK FORMATTER MACY11 27(732) 16-SEP-76 14:44 PAGE 24 
DZRPO.P11 ## SPECIAL FORMATTER ## 


$73 5 ? 177766 003764 MOV #-10. , TOG2 ;TOG2=SECTOR COUNT 
$74 ooeres ? ae CLR oak 

975 MKBL1: CLR (RS)+ ;WORD1=0 
878 002732 016725 003760 MOV WORK, (RS)+ : WORK2=CYL+HEAD 
377 oe736 0124 . MOV (R4) +, (RS)+ ; WORDS=SECTOR 
978 003744 INC TOG2 :DONE 10? 
309 002744 001371 SNE MKBL1 :NO 

981 o02746 012704 003076 MOV #SCSLT,R4 sYES - UPDATE POINTER, 
982 0027Se 912767 177766 003730 MOV #-10.. toGe : COUNTER 
983 ? 093730 ADD #2, WORK *AND TRACK 
384 i4 INC TO61 :F INISHED? 
385 002772 001356 5NE MKBL1 : 

$86 602774 000207 RTS PC ) eee 
987 002776 ller77 000377 003762 SEKE: MOVB $ #377,aRPDS :CLEAR ATTN 
988 003004 112777 000011 003764 MOVE 11, aRPCS : 

§8g 903012 036777 003712 003746 BIT ATNB, JRPDS WAIT FOR 
990 1774 BEQ 6 ‘ATT 

981 O0030e2 112777 000377 003736 MOVE #377, JRPDS :CLEAR ATTN 
$2 903030 hed 003730 BIT #811, dRPDS * DONE? 

994 003046 104474 ERM+ER+CS+DS+DA SEEK INCOMPLETE 
995 003042 900207 RTS P ?ERROR EXIT 
895 003044 062716 oo0002 ADD #2, (SP) :G 

997 9030S0 000207 RTS PC tEXIT 

998 903052 004117 NSTR: NO 

$99 903054 004124 Ni 

1000 003056 904131 Ne 

1001 003060 004136 N3 

1002 003062 004143 NG 

1003 003064 O041S0 NS 

1004 003066 o04155 NG 

1905 003070 004162 N7 

1006 003072 904167 NS 

1007 003074 004174 NS 

1098 003076 SCSLT: .REPT 12 

1009 "WORD =O 

1010 "ENDR 

1011 003076 oo0000 “WORD O 

1012 903100 o90000 “WORD 0 

1013 003102 900000 “WORD OQ 

1014 0603104 Oo0000 “WORD 0 

1015 003106 900000 “WORD 60 

1016 003110 oo0000 “WORD 0 

1017 9803112 o00000 "WORD 0 

1918 003114 oo0000 “WO 0 

1019 003116 oo0000 “WORD 0 

ded 003120 “WO 0 

1022 003122 SCFLG: .REPT 12 

1023 "BYTE 0 

1024 ENOR 

1025 003122 000 BYTE O 

1026 903123 900 BYTE 0 

1027 003124 0 BYTE QO 

1028 003125 000 BYTE O 
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o- 


C O1 
Pl 


SK 
1 

003 
003 
003 
& 


FORMATTER 
#% SPECIAL FORMATTER # 


: 


oOoo0000 


1 
1 
1 
1 
1 
1 


a 
30 
% 


o—- & +b -- 6 <6 -< 6 + 9 = 9 <9 > = & -< 9 — 9-2 


SeGRRTOSLO RETO EERO SS 


Rae 


O— 0-2 b+ bb b— b+ 


ialaliaiataiaataay 


B 
BB 
Re 


R 


0+ 6 D+ b+ p+ b- +b =o +H 
-- 


i 


oe 
THOTT LOLOTUOLO LE 


RARER 
8 


BIS Islan 


cs b= t 76+ bb bb 





PRINT MESSAGE 
;POINTED 10 TO BY UMES 


SA IT 
AS ROTAFION ATTENTION BIT 


rf 0 
19 GETERRINE A a ENTION BIT 
12 B T HERE 


; SAVE Mart 
;SELECT UNIT 
1S IT READY? 


tYES = EXIT 
:SELECTED UNIT READY NOT UP 
LOOP UNTIL FIXED 
:PRINT MESSAGE 
sPOENTED TO BY S1 
PRINT NUMBER OF SPACES 
SIN TTG. THEN 


READ SOME NUMBERS 
a TS NOW THE GOOD RETURN 











IS eee FOR THIS SEQUENCE 





30 
YES = EXIT 
:TTG=8 OF SPACES 
5109 MANY 

STOSTIFY NEXT ENTRY 
; FOR GOOD RETURN 
’ 
;CLEAR ATTN BITS é 


WAIT FOR 
;SEEK TO 


: START 
;IS SEEK UNDERWAY? 






o 
ge 
= 
> qQ 
law | 
—e 


a 


gsr cs 


fe 


SRR ROR BR RRO aw Non con -OsD REN LoVe 


SK PACK FORMATTER MACY11 27732) 16-SEP-76 14:44 PAGE 26 
l ## SPECIAL FORMATTER # 
bosses aed Errvenonéed fe NOT UNDERWAY 
sSisee Rone PR re 
003400 036777 003324 003360 BIT ATNB, JRPOS eT Oe is oe 
Beaute oo4000 003350 BF? #811, IRPDS ; SEEK THCOMPCE TE? 
003416 o01402 Q +6 
003420 104434 ERM+ER+DS+CS t DEVICE STATUS ERROR 
003422 000744 BR *L 
003424 132777 000023 003336 BITB #23, aRPDS1 “ANY ERRORS? 
003432 oo140e BEQ +6 : 
036 03434 104434 ERM+ER+CS+DS :DEVICE STATUS ERROR 
36 000736 3R HOME :LOOP 
003440 112777 000001 003330 MOVB #1, aRPCS *RESET THE RP11 
OO3446 112777 000377 03312 MOVE #377, aRPDS :CLEAR ATTN BITS 
003454 116777 O032% 003316 MOVE UNIT, JRPCS1 ; RELOAD UNITS 
003462 000207 RTS EXIT 
003464 062704 ooo002 CHKAD: ADD #2,R4 :SKIP 1ST WORD 
003470 012467 003246 MOV (R4)+, HEDR ;FETCH HEAD AND 
003474 015767 O03°04 003236 MOV HEDR,¢ :CYLINDER READ 
006067 903234 ROR HEDR JUSTIFY HEAD 
006067 ROR CYLR 
003512 003222 ROR CYLR 
003516 OO60E7 003216 ROR CYLR 
003522 006067 003212 ROR CYLR 
0032 ROR CY 
003532 006067 003202 ROR CYLR 
3536 012467 o03202 MOV (R4)+, SECR ;FETCH SECTOR READ 
003542 ANDI SetR 
003542 042767 177760 003174 BIC are ,SECR ;MASK 17 APPLIED TO SECR 
003550 042767 177740 003164 BIC #-37-1, HEDR ;MASK 37 APPLIED TO HEDR 
003556 ANDI 777,CY 
003556 042767 177000 003154 BIC #-777-1,CYLR | ;MASK 777 APPLIED TO CYLR 
4 026767 003142 003146 CMP CYL,CYLR : 1S CYL# OK? 
003572 001013 BNE 
003574 026767 003134 003140 CMP HED, HEDR iTS TRACK® OK 
003602 o01007 . BNe CME :NO 
003604 026767 003126 003132 CMP SEC, SECR :1S SECTOR® OK? 
003612 001003 BNE CNMER :N 
3614 062716 oD000e2 ADD #2, (SP) jALL _ADDRESSES 
003620 090207 - RTS PC - EXIT 
003622 104500 CMER: ERM+HD ‘HEADER COMPARE ERROR 
003624 000207: RTS PC ERROR EXIT 
003626 SUBER: PNTM  SUBRMS 
003626 012700 006241 MOV #SUBRMS, RO PRINT MESSAGE 
003632 004767 002776. ISR PC. TYPOLIT ; POINTED’ TO BY SUBRMS 
ee (ere fun a} aoe sagen 
BOSeHe Apereo ee 5 PC’ OCTPNT ip wicAGRESs 
003652 000207 ‘ RTS PC EXIT 
54 012767 000005 003072 TTIO: mov #5, TTG UP TO S OCTAL DIGITS 
662 005067 003032 CLR WORK 1 cle EAR HOR REG TSTER 
O03666 004767 O00102 TTIL: JSR PC, RIN it CHARACTER INTO RO 
003672 O20027 o00e15 CMP RO, #215 ae ITC 
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D28FD.F LL > SPECIAL FORMATTER # 
124) 09396°6 001427 83 TTIX ses 
lisz 003790 OO4TS? o026u6 JSR ss PC, TTO a 
1143 903704 S200e7 00026" CMP «RO. we67 60 B16? 
1:44 003719 101030 BHI TTRX sYES 
145 S03712 Geode? oo0257 CMP «RO. a257 7700 SMALL” 
1i4é soars 151425 BLOS = TTAX 
Lis 720 30536° 46003030 OECOs«aTTG SCOUNT DIGIT 
tig 003784 100422 BNI TTRX TOO MANY? 
118$ paecge RNDI 7,80 3NO_= MASK [IT 
1150 ree S4er00 = i77770 Bi¢ 8-7-1, R0 sMASK 7 APPLIED TO £0 
1151 ?se =O0CT4] cLC ; 
1:52 903734 J0Sis? 02760 ROL WORK} : SHIFT 
1153 903740 906167 002754 ROL = ss WORK. sWORK REGISTER 
1is4 Bobib? Sbe75c ROL = WORK! $2PL 
1155 093750 960067 d0s744 ACD = RO, WORK : ROD NEW NUMBER 
1156 OO375" 00744 aR Th _. GET NEXT ONE 
1157 903 Ou: 7 902540 TTIX: JSR PC,TTO ) 
1158 716 900002 ADD = #2, (SP) ;SKIP RETURN 
1159 0037 916790 002726 MOV WORKI, RO 
1189 9037 . TTRX: RTS 
1161 003774 505267 173560 RIN: «INR TKS sFETCH A CHARACTER 
ile O0400G 105767 173654 TS78) TKS ;WAIT 
1163 004004 100375 SPL .-4 :FOR IT 
1165 904006 116700 173550 MOVS  TKB,RO :READ IT INTO RO 
11g5 9040: ANDI —- 377, 80 
1166 S040le O4er00 177400 BIC = &- 377-1, RO ;MASK_377 APPLIED TO RO 
1162 SONOLE 07 RTS = PC ;AND EXIT 
oe 
ie 
1171 02304 O47125 OS2111 UMES: ASCII /S8UNIT: 2: 
i172 904026 Oe007e 100 < | 
1173 004031 —— 946 O4444E OS0116 SECMES: .ASCII /SSINPUT THE SECTOR NUMBERS(O-9) IN THE ORDER DESIRED. 2 
1174 004036 052125 O 942510 
1i75 OO4044 051440 041505 04 
Lime owse Oediee OseS1e wills 
1177 OO4060 051105 Oc41e3 Oe646 
1178 OO04066 Se4471 O44440 O20116 
1179 004074 O441e4 O20105 051117 
1180 904102 O42504 Oe0le2 O42S04 
118} 604119 O445e3 O4e5e2 027104 
1182 904116 100 
1183 904117 — O46 035060 O40040 NO ASCII 780: 2 
1184 004124 O30446 100 Ni “ASCIT “81: 9 
1185 904131 — OWS 035062 O40040 ASCII 82: 9/ 
1186 OO4136 031446 100 N3 “ASCII 733: 3/ 
1187 004143 — O46 O35064 O4O040 NY “ASCII 784: 3/ 
1188 OO4i50 o32446 20072 100 NS “ASCII 85: 9/ 
1189 OO4iSS O46 O35066 O40040 Neb: “ASCII 786: 3” 
1190 O0416e 033446 20072 (100 N?: “ASCII 787: av 
119] OO4167 —— O46 035070 O40040 Ne: “ASCII 788: a 
1ige OO4I74 O3H44e Gedb7e Ng ASCII #89: 3/ 
«4184 00420) — O46 OS1446 OS2105 SWMES: .ASCII /S8SET THE FORMAT ENABLE SWITCH. / 
1195 804206 oS204S O42510 043040 = 
1196 04214 061117 040515 O20124 









kd 


= 
4 
es 
a he] 


11> 9--0—~ 
BiB4 
sages © 
# 
ie 
z 
s 


G 
é 
2 
vi 
* 
oH > OF 
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l #*® SPECIAL FORMATTER #* 





~ASCII /SSET THE RP11 WRITE ENABLE SWITCH. / 


2 
2 
8 
# 
a 
x 






zg 
i 
tir] 
Hit 
cm 
Eau? 
22 
fo 


& 
en 
Rs 
R 


-ASCII . “8SET THE SELECTED UNIT WRITE ENABLE SWITCH. / 


fetetetetetete: 
pt niptot 
2EA22R? 
Seehy 
Bia 
Sener 
§ ERRERE 
2983 


O44S2e ~ASCII /3STRIKE ANY TELETYPE KEY WHEN READY. Sa/ 


Z 
® BANRRSS AH 
oO 





i 
a 
te 
P8728 2 


i 
mw 
fuURtD 


frururuorururururururufrururururururu 
GIG) 
~—- 


0-2 0-- 0-2 b+ B-< 9-9 9 - p- 


0002 NIM ULE UITue-O 
3 
i 
aR S 4 
RES tat dt 
aA 
a 


- 
Qo ~~ 





4505 NSWMES: .ASCII /3SRESET THE FORMAT ENABLE SWITCH TO NORMAL. / 


i 
3 
4 
xe 
R 
PEER 
ai 


65 
re 
i 





igiuiahahy 
Z 
a2 & 


ule 
a 4 
AEA 
— Je 
=) 





Re 





fu 
o~ 





RREEP 
ASR te 
ovis 









ajo oo 
& 2b-* be BS 


peal -ASCII /SSTRIKE ANY TELETYPE KEY WHEN READY. 8a/ 


a 
e229 
s 


y 

8 

R 
P2PR BR 


| 1240 004544 032777 O40000 002224 HRDER: BIT #814, aRPCS ; TEST HARD ERROR BIT 
le41 O045Se 001001 HRN ;OK_IF SET 
| 


le4e OO4SS4Y 1} ERR+CS ;HARD ERROR NOT SET. C(SP} POINTS TO CAUSE 
e43 004556 022777 100000 O0e2l2 HRNI: BIT #815, aRPCS ; TEST ERROR BIT IN RFCS 

1244 004564 001401 BEQ +4 -,  §OK% IF. SET 

le4S 004556 000207 RTS PC ;OK- EXIT im 

3 004570 104020 peeves DA ERROR NOT SET. C(SP)} POINTS TO CAUSE 


004572 000207 | R PC tEXIT 
1248 004574 032777 O40000 002174 SFTER: BIT #814, BRPCS :TEST HARD ERROR BIT 





1249 OO4e02 001765 EQ :Ok IF CLEAR ; 
1250 04 104020 ERR4CS :SOFT ERROR SET HARD ERROR SIT 
1251 OO4606 000763 oe HRN1 ;TEST INCLUSIVE ERROR 

1252 04610 017667. 000000 O02144 RTR: MOV  a(SP},ROTOG = ;FETCH SHIFT COUNT 


Sssnccuiniterconenalinhaieidecngiahaliiasin 


8 
o- 
o- 
OO 
“on 
| ell aed 
~~ 


i 


ae 


PRR SRO RE ROHR i 


Geese 


fury 
o 
™ 


20-0 -0— 0-< > <0 -+ &-< -- 9-< » + 9 ~~ 


TTS 
rm 
3 


o 
Ws) 


g 
8 


8 
g 


8 
g 


= 
o 
8 


: 


8 
a 


se 


8 
8 


S 


BS see Sys 


ACK FORNATTER 
#* SPECIAL FORMATTER ## 


000002 
002130 
000000 
000082 


002102 


MACY11 27(732) 


we, (SP) 
RO 
ROTOG 
RRLUP 
PC 
a(SP) 
#2, (SP 
RO 


ROTOG 
RLLUP 
PC 


+ 
PC, GBTYPE 
#81, (RS) 
+6 





ROTOG 


:T 


;NO 
;SUBROUTINE ERROR 
;RPCS? 


. 
, 
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;STEP RETURN VECTOR 
: CLEAR L 

sSHIFT RO RIGHT ONCE 
sFINISHED? 


sYES- EXIT 
FETCH SHIFT COUNT 
STEP RETURN VECTOR 


t PINISHED 
:NO 
;YES- EXIT 


;RING THE BELL? 
;BRANCH IF NO 


;PRINT MESSAGE 


POINTED TO 


YES 
RPOA & RPCA? 
NO 


: YES 
1 a MESSAGE? 


sYES 
B0¢}) FOR GO0D’BAD 
;SKIP IF=O 


;G00D/BAD 
;81(1) FOR DATA 
;SKIP IF=0 


CLEAR LINK 
BTL DR ter OME 


BY BELL 
EST TTO DELETE SWIT 
;EXIT NOW IF TTO DELE 


;SAVE ACO- 

sMESSAGE POINTER TO KO 
;PRINT 

;FETCH SAVED PC 

sFIND ADORESS OF ERROR CALL 
sPUT POINTER IN RS 

sMESSAGE POINTER 

sPRINT “PS=" 

sFETCH SAVED STATUS 

: AND PRINT IT 


CH 
TE SWITCH IS UP 





~ 
~~ 
Qo 
ails) 
oo 4 
* 


acta ic tae ill 


o-- db => 6 ~9-- 0 - 9 ~~ 9 -- pp 


= ] 
Pinata intetatetete: 
HS5KFSRVE WED 


O~* P+ b= b= 9 b= 9 
Wd “IC U1 6 LITUe~C) 


ini faites «=| Rea 


aae SECs 


st 


eB 


Cn SO 


pai da ar Seal uk RE RE he RAS ryan icicw AU PIN 


eC 


FORMATTE MACY11 27(732) 
## SPECIAL FORMATTER ## 


ERXIT: 


J 
ERXITI: 


1S: 


LERCHK: 


LERXT: 


LUPCHK: 


GBTYPE: 
JSR 


CSTYPE: MOV 
DATYPE: 

J 
ERTYPE: MOV 
DSTYPE: 


000001 001412 ADTYPE: 
001420 001334 
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PC, DATYPE 


1 
ARPCA, WORK 








;DATA 

;RESTORE ACO-S 
;PRINT 

;CR 8 LF 

;WAIT FOR DONE 


;HALT ON ERROR? 


;ERROR HALT. CONTINUE 
sEXIT ERROR ROUTINE 


PtP te ae ON ERROR 
biance RETURN VECTOR OVER LOOP JUMP 


ete fede ALWAYS 
ADIRNCE RETURN VECTOR OVER LOOP JUMP 


sCOINTER TQ “GOOD” 
;PRINT Wear 


FETCH C(GOOD) 
: PRINT pera NUMBER 
NTER TO “BAD” 


:POI 

sPRINT MESSAGE 
;FETCH C(BAD) 

spat OCTAL NUMBER 
scone 19 “STATUS” 


FE CH ceRecs) 
;PRIN NT OCTAL NUMBER 


i BOINTER TO “DATA” 
TEST 


sEETCH C(DATA) 
OCTAL NUMBER 


; ADDRESS ERROR? 
BP THE CLYENDER ADOREEE 








Oh dalnboted ote 


vietiettcrit ctatiacot eens 


4 
—~ 


ed 0+ 0 b= b+ & + 6 0B — © = 0 = = 0 0 He Oo 0 pp 
BRE 


ISK PACK FORMATTER 


PL 
i3ee Boers 
1367 905400 
1 406 
uly 


00S4 
0054 
00S432 


OOS446 
00S4S0 


001416 


MACY11 27(732) 
## SPECIAL FORMATTER &# 


001324 


001112 


001102 
001074 


001044 
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Zasz 


+0 
- wo 


ates tet atutet tutu teted 


ay 


w 


| RO iBRINT 
WORK2+1, RO : PRINT 






SS rate ;GET HEAD AND SECTOR ADDRESS 





ADTI 

#37 ,WORK2+1 
pecty 
WORK2+1 

all WORK 


aD ; 
#11411, WORK2 
WORKS . 





8-777-1,R0 ;MASK 777 APPLIED TO RO 
: CAR 

#TAMS. RO : PRINT 
:"TAR=* 


#-37-1,R0 s MASK 37 APPLIED TO RO 
Pen, 

WORK2 , RO : PRINT 

#-17- : sMASK 17 APPLIED TO RO 

vent BiT 





, WORK 
8-7-1 WORK ;MASK 7 APPLIED- TO WORK 


;MASK 61 APPLIED TO RO 













ivsq Qosron GoN7e? Gbd7Ss 
Tus? Qoeri4 Gove? Doors 
00S7e0 


1430 005724 904767 


1432 $2530 216700 


000776 

a 005734 004767 177634 

1435 B5eous 012700 006160 

O0S744 004767 000664 
005750 


i438 005750 916700 000760 
1439 005754 004767 177614 


a Bee 
1441 012700 906160 
1442 005764 004767 000644 


1443 005770 

1444 005770 016700 09074e 
1445 005774 004767 177574 
1446 906000 

i447 006000 012700 006165 
a 006904 004767 O006e% 
14439 006010 

1450 006010 O12700 006160 
12s 006014 9004767 000614 
1S EE ero cans 
1454 O0060e% 004767 000604 
1455 006030 

1456 006030 012700 O06:6e 
1457 006034 004767 000574 
1458 O06040 

1453 006040 BiE700 000674 
iat O06044 004767 177524 
1462 06050 012700 606160: 
1463 006054 004767 000554 
a. 
ie Beet AD 
1467 006070 
1468 006070 012700 906160 
1469 004767 000534 
1470 100 

1471 006100 016700 O00640 
472 006104 O04767 177464 
14 ratty 

1474 110 012700 006165 
1475 006114 004767 000514 
1476 O06ie0 000207 
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## SPECIAL FORMATTER ## 


1429 005720 012700 o0b162 
000704 







HOTYPE: PNTM 
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#HOMS, RO 
PC. TYPOUT 
cOhs RO 

PC, TYPOUT 


PC Bee ur 
Et 
eC, ,PNTOCT 
#51, RO 
eo 
HED, RO 

PC, PNTOCT 
Si’ 

#51,R 

PC +fPour 
set 


Beane PNTOCT 
CARET 


SCARET, RO 
PC, TYPOUT 
pC’ 


;PRINT ME 
;sPOINTED TO BY Sl 









PRINT MESSAGE 
;POINTED’ TO BY HOMS 


; PRINT MESSAGE 
;POINTED TO BY GOMS 






;PRINT MESSAGE 
;POINTED TO BY S2 


s PRINT & OCTAL 
;NUMBERS IN CYL 


;PRINT MESSAGE 
POINTED TO BY S1 


3 PRINT & OCTAL 
;NUMBERS IN HED 









;PRINT MESSAGE 
;POINTED TO BY Sl 


;PRINT & OCTAL 
mada SEC 


T MESSAGE 
;POINTED' 70. BY CARET 









;PRINT MESSAGE 

;POINTED TO 8Y Sl 
PRINT MESSAGE 

POINTED’ TO BY BOMS 


;PRINT MESSAGE 
POINTED TO BY S2 


; PRINT & OCTAL 
;NUMBERS IN CYLR 


PRINT MESSAGE 
: POINTED TO BY Sl 


*NUMBE ae 





SAGE 






;PRINT & OCTAL 
NUMBERS IN SECR 


PRINT MESSAGE 
;POINTED’ TO BY CARET 











1502 006241 


Getmnets 


UTUNUTUNUNUUNUn Unit 
= 0 ee 
WODNMUC Wte-O 


tt tit 


wna 

tet 
: 
8 


Nae 
BES 


waie3 


RSs 
Sink 


FORMATTER 
## SPECIAL FORMA 
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TTER ## 





HOMS: .ASCII “48 CYLINDER TRACK SECTOR@/ 





S1: ASCII 4 
Se: ASCII 7 
CARET: .ASCII /8a/ 








ERMS1: .ASCII /8SERROR AT ADDRESS a/ 





OLDMS: .ASCII /80LD: a/ 
NEWMS: .ASCII /&NEW: a 
SUBRMS: .ASCII /8CALLED FROM SUBROUTINE AT a/ 











CSMS: .ASCII /8RPCS= a/ 
ERMS: ASCII /SRPER= 2/ 
DSMS: ASCII /SRPDS= a/ 
cms: ASCII. /8cAR= @/ 
TAMS: .ASCII / TAR= a 
SEMS: .ASCII / SARS a 
GOMS: ASCII. /8G00D= 2/ 


BOMS: .ASCII /BAD= a/ 
4 PS= a 








I03 
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/ETEST CCMPLETES/ 


<7) /9/ 


«ASCII /8DATAR= a/ 


-ASCIT 
-ASCIT 


MACY11 27(732) 
#% SPECIAL FORMATTER ## 
BELL: 
-EVEN 


ISK PACK FORMATTER 
poole pe = O40Se4 DAMS: 


ll 


lle 4 


Rsrntete ntact 


fe) 


STACKED ABOVE IT 


;WITH RO ON TOP 


PC, BUT AN 
:RTS WOULD Ppp He erack-£0 JUMP OUT 
;MOVE SP OVER WORD SAVED BY JSR 


wy 
uy 
Wis 
zu 
e 

g 
ie 


;RS HOLDS THE 


ee ee ee ee 


EBREG.: 


Sn banton bon pen! 
Lop) ae) os | oe ] 


IMA) BAe ABE RE 
Reena MM una ee MURR Ra 


Ce Ree Re eee ee Dees heme Dee Reem Rome Rees hare Kore Fee Dee Feet Dene ee ene ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee) 





;RS_ IS POPPED BY THE RTS AND 


;THE PC IS TAKEN FROM RS 





z 

Bs 
e S& 
EEG ® 8 
gots 32 - 
cia Wp. ox 
eeo® Seen © ® ste 
Pes gates BS Eat 
of aeore 42 Bene 5 
Sass aS hry Scheer . 
Siu 2 ones oes g 
So>Sauu' ig | nea 
staanever ee ceseiteEs 


7 
s 
, 
, 
s 
s 
. 
s 
7 
’ 
7 
s 
7 
’ 
’ 
’ 
’ 
, 
’ 
’ 
, 
s 

’ 

’ 

s 


Saunt | Seay 
Qy Kut 


fu & 


- acu 
os Poe otd ded uo 
SWE SOS OU BEF Obr Se Owe 
> -o > ow 
epreeturstay turotatet tatay ss art atetg 
-—- -=e - “ ae 
& ae 5 a a 
Sue, REOR £ 


ee 
oO 
e 
- 
4 
La 
— 


i2702e 000012 


5 





is 
= 


1 


= 


; INCREMENT QUOTIENT THEN 


; JUMP TO GET REMAINDER 


;ADD AGAIN 


;WHEN ACCUM PASSES DIVIDEND - EXIT 


;ADD DIVISOR TO ACCUM. 


;COMPARE TO 


56 AR MAT TENT AREA 


;SAVE DIVIDEND 


0067 000116 


fomuintutatnint 


Eee ee eee ees ee ee ee ee eee 












ae 
~ 
~ 
7 a 
00D 


O-- 0-0 +0 &-- <p -- p— <b + 


PRE SRR LSE OOS 


BIRR eGR 


COOOrrmwrwdnc 
ob Pb 02 2 2 2 bo 
000 NOU .£ iIfue-O 


PERO BRR URI Hues 


SRB 


0-0 = = b= & + b+ 6- + & 2 b= b-2 Ob  & = + 6 = 0 = 0 = 0 0 0 = 0 Pb = 0 0 = 0 0 0 0 0 - = 2 ho =< 0 po he 
rorww 
+ 


o 
Brett 


—o- 
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## SPECIAL FORMATTER ## 


DIVNI: 


TYPOUT: 
TPOFCH: 
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oOnpDz 
eae 

<< 
olan len) 
—-O0O 


Beno Om 
G8. & 


S gerSs3 
¢ da 3 





fe na MINDER = - INCREMENT QUOTIENT 
DIRT Elles 
EXIT wrtn ou QUOTIENT IN RO 


iF Ast oe oes POINTER FOR MESSAGE 
EG Stulatoe 


Te IT CRLF FLAG? 


iYES- trie DATA TO CRLF 


N 
MOVE POINTER TO NEXT BYTE 
;FETCH NEXT CHARACTER 
;POP STACK TO REACH RETURN VECTOR 








3 
| | 
OF 
z 
‘ if 
§ PANCREAS Sr 
f Boospooomaeeeeene. os 2 
Sn 
uy ao aoscie “ wre sane woMm> Su 
& BPPSSEEREEEre Tres eees 
am 
a 
5 
f 
5a 
‘ Sener i: 
2 


a, BESSSSSESESCERESen 


Lp DELSSeoT ARM e ERED EES 


-@ a et ett et ee ee hee hee eee lee bee Ieee hee Ieee Leen ok kame Ren oe hoe he oe tae oe 








;THAT’S ALL FOLKS! 









Shae 



















RP11C OISK PACK FORMATTER 
OZRPO.P11 CROSS 
TYPE ] 
T 4 1 
fo) 7. 14 
82D 1338 
BOMS 264 1 
Beet 4 1 
= l s 
1 = Sa 
190 hls ] 
1 s 8 
Hi: Sit 
2 = 020000 
i4 cs ats AOC 8 
15 = 100000 4038 
fie | OR 
= 
BY s Sah 
BP = 3938 
: a 
= 
2 
= 001006 t 
CARET OO06165 1447 
cc = 177776 me 
Ane, Boseid ara 
CLRS 19 
NER castes 120" 
CR 00891 3658 
cs = 000020 4108 
10S2 
c 006275 le 
CSTYPE O0S24¢2 1291 
C 006732 cio 
CYLA 006746 778% 
CYLR 006740 1104# 
CYMS 006325 1381 
Bowe = 000040 athe 
006401 134 
DATA 008702 13493 
DATYPE 005264 1309 
= 000002 407% 
007052 1081# 
DECCY OOS464 1375 
DECPNT OO6464 15538 
DECREM OD6476 1560 
DECTK  Q05440 1371 
BHP O06 1580% 
IVLP 006572 15838 
DIVN1  OO6616 1588 
DS = 0000: 408% 
1096 
DSMS 006315 1357 
DSTYPE 005330 1297 
DS! 003210 1049* 


a ip 27(732) 


ABLE -- USER SYMBOLS 


BgSPaRARSS Hig 


— 5 a tat tr 
B Shtdre io os 


———e _ 
S2 8 g3 
sos « 


fo 
coru 


b- b> =F b= =e 


Ho3 8 goa 


8s 


1S92% 


13818 

tee 16238 
1362 

1090 

1569 

828 844 
828 B44 
699% 766% 
11028 

11278 

1603 

630 719 
1246 1250 
749 7H 
16248 

16308 

1i08*  1109% 
728 831 
1665 

1593 1594 
719 728 





868% 


728 


8093 


1110% 
847 


16138 


831 


LO3 
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831 


887% 


1lll# 
899 


847 





1054 . 1243 81315 


847 899 927 


88g 907# 908 


1118% 1119 1459 
927 994 


994 






1057 








1086 
















DVEND 


Re 








a 


es 


33 
a 


2°88 


2 
a 





“Gah EXTEEPAARCER 8 








006606 


besa! 


BS8SR8 & 
eeRRGE 2 


foe 


£ 


| 


SUR aS 


Elgg enese 


case 


sbi 


1588s 


1057 1086 
683 £90 
12688 

1314 

15258 

1 

14 

744 747% 
840 163 
1105 1 

8s1 

78 

oar 800 
820 

1249 1251 
807% g09g* 





835% 


719 


1092 


719 


809% 
838 


roads Bis TSK PACK a Dow nef Ry! 4 oat 14:"4 NOS 
ioe 


728 


10% 


728 


816% 


1465 


810% 
849 





931# 


817 818s 

16288 

10798 ©1087 ~= 1093 
Gl1* 912% 913% 
920 932 16658 





327 994 1057 


0 Hi 343% 
‘1097 
give gist 817% 


1086 


1250 


1121 


8i9# 





2 

o- 

os 

oOo 
eo 
“ie 
Cs 


FFAS ‘i 





“ay 


cis, Saaz 
Bperee 

POPTT soe 4 
PS = 177776 
Pi 000090 
P = 1 
PS 1056 
Pe 001102 
P2L3 001236 
PEN! 001222 
P3 = 000140 
ma) = 
3 = 

= 000300 
RESTOS OO644E 
RIN 
RLLUP 
ROTOG 006762 
RPBA 00 
RPei1  po7034 
RPBe 007036 
RPBei 007040 
RPB3 007042 
FPB31 00 
RPCA 007006 
RPCS 006 


PACK FORMATTER 
CROSS REFERENCE TABLE 


PRR mictetetnisets 


* OK as 


~ 
cam 


0D ER 
rr 
ee oe 


4 


ae 1 tt 
££) 
ure 
Fn 


Gee 


o— &- &—- b= b— o— P— 0b —- 9 - 
Seenaaeee 


MACY11 27(732) 


USER SYMBOL 


895+ 


699 
iSS1s 
1139 


1263% 
893« 


8ege 
707% 
836 


Se2e 


03 
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1398 


7&6 


16458 


1364 
723% 
923% 


15618 


1367 
7o4e 
924 


911 


16468 
725 
988% 


823% 
1080* 


rots Ogee 
886% 890% 
1040%  1041# 
at et 
12% 1330# 
dot 1355* 
141S% 1417% 
1454" 1457 
1s95* 1604* 
L445 1460 

827% 828 
1098# 1240 


942% 
124 


942% 
L243 





RPLiS 23S PRK FORMATTER 
DORES CROSS SEFESENCE TASL 


oe" ws e 1] e 
RPSS: 4607200 
RoR ja epg esl 
RE ORL apees 
Reds Bo 7h 
RPDS] 74 
Ber: BaBoae 
RPI\ DOT OSs 
RETK 0750 
pace O070is 
Renz’ Soroee 
RPMei  OO070e4 
ROMS OO?702E 
REM3] 7030 
RPSo! 7010 
Res 907050 
REWC 007002 
RELUP © O04beE 
TL OO4E36 
RT JO4E10 
RO =*,000000 
Ri =*000001 
| Re =".000002 
}R2  =7900903 
=e 6904 
| RS =00000S 
| a =~000005 
| R7 =”090007 
| SavosS O064 
,SCFLG 90312 
| SCSLT 003076 
| SEC” DE 736 
| 5ECA «006752 
| SECMES 004031 
| SECR 0067’ 
| SEKE 
SemS 0063 
SFCHK 002254 
SFCL1  O024 
SFCLe 02510 
SFCN] O024EE 


uo ~) 
—f- 305% 


$5is 


- 0-+ 0-0-0 +00 
OOrrrrwrw 
om see. 

“NUIS OS) 


83 
$e 


“ACY 


3298 


2 erir3e) 


-- USER SY 


16 
MBO 


3100 
“841+ 


389 


16238 


16438 
geo+ 
3914 
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iS 





916+ 
992 


















2 
8 


asada 
ae 


“4 =4 
PRERRERES A: 
40-40-46) ae 
xor 
=< 
te 


Ox 
Ox 
a 


S§ 2: a 


tt 
—-4OW 


alot arte deta 
TOOL Va peo z 


ae 
OFOo 


ae 


PACK FORMATTER 





MACYL1 27(732) 
CROSS REFERENCE TABLE -- USER SYMBOLS 


~ 


VREFGATISEN VIE 


$éS 9638 
6864 So4+ 
1253 1260# 
1s48* 1551 
1075 

1273 1215 
698 7$5S 
1441 1450 
14878 

1182 

875% 882s 
982* 16158 
1411® 1418% 
1073 1137% 
104! 1065 
1157 1312 
15778 
1148 llé0s 
754 771 
1283 1333 
1436 144e 
768 


870 
9le 1045+ 


~- 
Lat] 


f 


15S 


1462 


9014 


16178 


1147# 
11378 
1415 


774 
1337 
1448 


ne 


eee ee ee ee ee 


698+ 
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765# 
1284 


1553 


1327 


1468 


905+ 








867% 
1324# 


iss4 


1569 


148S8 


930% 


15698 


996  1076# i158 
1405# 1412 i416 1544e 1545s 
1556 1563# 1567 1597# 1598 


936 939% 970% 84s 
1578-1604 

§? 79 949 =: 1940 
1353 1358 1382 1399 
1457, 148314691475 
1100 «=: 16228 


112S5# 1132 













1Sl48 





eee eC; — - Se 











04 
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D2RPD.Pil CROSS REFERENCE TABLE -- USER SYMBOLS 

URDY1  900$20 bb08 

WORK ODE P16 Que 97h (83H INOL® «L403 «HOH «14S 16188 

WORK. — 005720 (ee Sod. 7881970, L1ge* L1see L1sae Ligue Liss* ©1159 16198 

WORK? © O06722 1365# 1368" 1369 1370 «137ee «1 376# 13778 1379 1363 «1385 Lede 

WORKS 006724 1364* 13678 «1360e «1383 bee : 

Wid = 003356 10828 1083 : 

XX = 000000 3778 61317 «1610s BLL. «1642 s1B13-ssBL4 IBIS = s1G1E S117 -—s1818 = 18191820 
ibel «6 bee sbe3Ss16e4 = s16eS 1626 S627) «1628 «= 16281630 = ie31 «= 16321633 
1634 «1635 = 163616371664 

. = 007084 aye 4394] SS. ESET SHG 
463 465 467 469 471 473 475 477 479 481 483 48S 487 
48849153 yar 498—i“‘i‘iS] 03S SP? (88s 
sis Si7,—sS18——sS2disiSed—s5S sOP iii] 53355975 
S41 S43 HF SC si] CS SSCS G7 55SEC (issEsCSESS 
Ser ( itiSSsC‘dS72—=<(iéi‘*i7?QsC‘c?SS:Cti«C*dPPsC (ssi7QtsiB]C GQ? 58953} 
s3iiSS5 FC 601 603 605 607 E13 Biss 1? 
big b21—s23si2SséO? 2S HOR GH) be SHG EN) 889 
ris 718i sC(<ié‘aCS HSC QF BS (sss 18 
1085 «1089109109516 1244 1290 1263 1886 «2S 1298 13021305 = 1308 
1323 «1328 = (1808 
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| DZRPO.P11 CROSS REFERENCE TABLE -- MACRO NAMES 

ANDI 4i6e 1112 2115 2117 1249 2165 1384 1390 139% i402 8 1413 

| PNTM “ale 660 70 ms 769 ee: 738 Boe 871 947 1938 1059 «1129~Sfs«k270—Sts=«* 2 
14 1428 1434 144 L446 144 14 145 Hel 1467 14 

PNTOL a36e «143101437 s1H43slHSe SS lHG4d 1470 


_— 


_-__- 





6 
4 


ae AR ik ToS | 
dicot Eanes 


- 
foe 
—~ 
PS 


tu 
£ 
& 


o- b--e oR = 


o- 
o-- 


2 AWeeeyers 


3 Shee Geese 


oe. 
-——~) 
m 
jw 
~ 
~ 
eS 
oO 


i 
i 


S 
ror 


Buuee Ye 
SUSRERRSE EROS SRMRKONG 


o 
_ 
co 


s 


iB 


“J 


o 


PRIS 


0» b> 


Coe enoeeeeeds 


Soecerere BP 


ray ent etd 
SB er 3 
Bowe 
o 
£ 
Ww 
eo 
bb o— 
Hass 
& 
N 
Ser yrs 
wre 


Sy 


-~ 
SSeBaIs 
te wT 

wo 

Ne 

tu 


_— 
— 
— 
Tw 
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983 


1357 


POR ete 


Sh SERGSEBS 


1076 


ont 


RERAS Hy 
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1102 


etthandtarisie 


ays 


l 





Beale 


“ies SSIs 


~ 
ow 
neo 


- 
tJ 
“J 
- 
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© 

ot 4-4 4 4 fm hae Rae co | -_ 
cur Tonmw moc ba] 
DSI AoesS ge BS RM = 
ttt tee + —t-4 4 4 4 -4 
--——t 7 Tm tu “8 
Barrer 3 BY tet 3 
oe ee em he keen } 4 4 4 te te ao 4 4 


5 PASS BNEeRE : 


eS ee 


MACYL1 27(732) 
CROSS REFERENCE TABLE -- PERMANENT SYMBOLS 
336 
381 
38 
46 
iS94 
716 
1053 
869 
] 


SROs PRES EI 8 a Ne ¥ 
7455, oo 

; Tes 

a 

SUL ATE WORM EGR ER AY oR Bos 


40S 


RRA VERO Ey ea RA Moe 


TIME: 4 9 3 SECONDS 


RUN-TIME RATIO: 


DEFAULT GLOBALS GENERATED: 
+, DZRPD/SOL /CRF /PAGNUN+DZRPD 


RP11C DISK PACK FORMATTER 


ERRORS DETECTED: 





DZRPO.P11 
MOVE 
NOP 
RESET 
roe 
TI 
7S 
TRAP 
TST 
TS18 
ASCII 
BYTE 
ENABL 
END 
E 
LIST 
NLIS 
PAGE 








HO4 


ryatia acer 0D KC yee oe aH 
. 2s 


pore’ >\ Ba. ‘ 
EEE EE REECE EEL OV ETEEEEE > eAanAnnenqoagqqqaaas ++++ 
ANNAN SULTS Peeree ere 33.33: ' 00 Sui OO0NL 


%% 
Teese! waghges. 


lulslesletatete’s sift DOOU0K! Jafatel taste IOODOOONHOGORO:! relate DOUOOUOL 1 
egegesee 00 





